home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / cvs_detect.nasl < prev    next >
Text File  |  2005-03-31  |  2KB  |  65 lines

  1. #
  2. # This script was written by Noam Rathaus <noamr@securiteam.com>
  3. #
  4. # See the Nessus Scripts License for details
  5. #
  6.  
  7. if(description)
  8. {
  9.  script_id(10051);
  10.  script_version ("$Revision: 1.11 $");
  11.  name["english"] = "A CVS pserver is running";
  12.  script_name(english:name["english"]);
  13.  
  14.  desc["english"] = "A CVS (Concurrent Versions System) server is installed, and it is configured
  15. to have its own password file, or use that
  16. of the system. This service starts as a daemon, listening on port
  17. TCP:port.
  18. Knowing that a CVS server is present on the system gives attackers
  19. additional information about the system, such as that this is a
  20. UNIX based system, and maybe a starting point for further attacks.
  21.  
  22. Solution: Block those ports from outside communication
  23.  
  24. Risk factor : Low";
  25.  
  26.  script_description(english:desc["english"]);
  27.  
  28.  summary["english"] = "A CVS pserver is running";
  29.  script_summary(english:summary["english"]);
  30.  
  31.  script_category(ACT_GATHER_INFO);
  32.  
  33.  script_copyright(english:"This script is Copyright (C) 1999 SecuriTeam");
  34.  script_family(english:"Service detection");
  35.  script_require_ports("Services/cvspserver", port);
  36.  script_dependencies("find_service.nes");
  37.  exit(0);
  38. }
  39.  
  40. #
  41. # The script code starts here
  42. #
  43. port = get_kb_item("Services/cvspserver");
  44. if(!port)port = 2401;
  45.  
  46. if(get_port_state(port))
  47. {
  48.  soc = open_sock_tcp(port);
  49.  
  50.  if (soc)
  51.  {
  52.   senddata = string("\r\n\r\n");
  53.   send(socket:soc, data:senddata);
  54.  
  55.   recvdata = recv_line(socket:soc, length:1000);
  56.   if ("cvs" >< recvdata)
  57.   {
  58.     security_note(port);
  59.   }
  60.  }
  61.  
  62.  close(soc);
  63.  
  64. }
  65.